home *** CD-ROM | disk | FTP | other *** search
/ Sunrise Express Series 285 / Sunrise Express Series 285.iso / pc / JR.Dxr / 00008_ChangePhoto.ls < prev    next >
Encoding:
Text File  |  1998-05-11  |  341 b   |  11 lines
  1. on mouseUp
  2.   global gphotonumber
  3.   set oldmember to "Photo-" & string(gphotonumber + 1)
  4.   set gphotonumber to (gphotonumber + 1) mod 11
  5.   set nextnum to gphotonumber + 1
  6.   set thesprite to clickOn()
  7.   set membername to "Photo-" & string(nextnum)
  8.   set the member of sprite thesprite to member membername
  9.   unloadMember(member oldmember)
  10. end
  11.